elementos1a1 :: [t] -> [[t]]
elementos1a1 [] = []
elementos1a1 (x:xs) = [x] : elementos1a1 xs